home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / GRAPTIES / MULMDLT.LZH / MM1.EXE / EXAMPLE4.BAT < prev    next >
DOS Batch File  |  1992-09-07  |  5KB  |  193 lines
  1. @echo off
  2. :
  3. : This should give you a template to create your custom menu system.
  4. :
  5. : two handy batch file tips.  1. a colon and a space makes for a time-saving
  6. : comment.  1. ECHO followed by a "." will echo a blank line. 
  7.  
  8.  
  9. :menu_again
  10. textmode
  11.  
  12. SHOW MENU.PCX
  13.  
  14. KEY 123456789Q
  15.  
  16. IF ERRORLEVEL 10 GOTO QUIT
  17. IF ERRORLEVEL 9 GOTO MENU9
  18. IF ERRORLEVEL 8 GOTO HELP
  19. IF ERRORLEVEL 7 GOTO MENU7
  20. IF ERRORLEVEL 6 GOTO MENU6
  21. IF ERRORLEVEL 5 GOTO MENU5
  22. IF ERRORLEVEL 4 GOTO MENU4
  23. IF ERRORLEVEL 3 GOTO MENU3
  24. IF ERRORLEVEL 2 GOTO MENU2
  25. IF ERRORLEVEL 1 GOTO MENU1
  26.  
  27. goto menu_again
  28.  
  29.  
  30. :MENU1
  31. SAY THANKYOU
  32. : This is the OVERVIEW for multimedia 1
  33.  
  34. rem         do BLUE EYES INTRO
  35. show-win blueyes.gif
  36. delay
  37. show-win mouthop1.gif 76 142
  38. say hello
  39. show-win mouth.gif 76 142
  40. zoom out
  41.  
  42. rem         do MULTIMEDIA 1 INTRO 
  43. show-win bricks.gif
  44. say welto 
  45. say multi1
  46. delay
  47. show-win found1.gif 0 84
  48. say master
  49. zoom in
  50.  
  51. includes
  52. clr-text
  53. goto menu_again
  54.  
  55.  
  56. :MENU2
  57. SAY THANKYOU
  58.  
  59. : show business home examples
  60.  
  61. textmode
  62. BUSS-APP
  63. clr-text
  64. goto menu_again
  65.  
  66.  
  67. :MENU3
  68. SAY THANKYOU
  69. : show educational Jupiter example
  70.  
  71. show-win jupiter.gif
  72. gtext "JUPITER" 2 9 16 180 260
  73. gtext "LARGEST PLANET IN" 4 20 14 200 260
  74. gtext "THE SOLAR SYSTEM." 5 20 14 200 260
  75. say jupiter
  76. gtext "JUPITER TAKES ALMOST" 19 20 8 160 260
  77. gtext "12 YEARS TO REVOLVE" 20 20 8 160 260
  78. gtext "AROUND THE SUN." 21 20 8 160 260
  79. delay 4
  80.  
  81. : ERASE TEXT
  82. gtext "JUPITER" 2 9 16 0 300
  83. gtext "LARGEST PLANET IN" 4 20 14 0 260
  84. gtext "THE SOLAR SYSTEM." 5 20 14 0 260
  85. gtext "JUPITER TAKES ALMOST" 19 20 8 0 260
  86. gtext "12 YEARS TO REVOLVE" 20 20 8 0 260
  87. gtext "AROUND THE SUN." 21 20 8 0 260
  88. zoom out
  89. say wow
  90. EDUC-APP
  91. clr-text
  92. goto menu_again
  93.  
  94. :MENU4
  95. : question example
  96. textmode
  97. call example3.bat
  98. ECHO.
  99. ECHO             ╔═════════════════════════════════════════════════════════╗
  100. ECHO             ║  You can use Multimedia 1 to create a complete tutorial ║
  101. ECHO             ║  with question and answers testing or create a complete ║
  102. ECHO             ║  menu driven application (just like this program).      ║
  103. ECHO             ╚═════════════════════════════════════════════════════════╝
  104. ECHO.
  105. ECHO.
  106. ECHO   Press any key to return to the Main Menu
  107. key
  108. clr-text
  109. goto menu_again
  110.  
  111. :MENU5
  112. textmode
  113. call example5.bat
  114. call example6.bat
  115. goto menu_again
  116.  
  117.  
  118. :MENU6
  119. textmode
  120. steps
  121. clr-text
  122. call tutor.bat
  123. goto menu_again
  124.  
  125.  
  126. :MENU7
  127. textmode
  128. call play
  129. clr-text
  130. goto menu_again
  131.  
  132. :HELP
  133. textmode
  134. MANUAL
  135. clr-text
  136. goto menu_again
  137.  
  138.  
  139. :MENU9
  140. textmode
  141. register
  142. clr-text
  143. goto menu_again
  144.  
  145.  
  146. :quit
  147. SAY BYE
  148. scroll up
  149. ECHO.
  150. ECHO    ╔══════════════════════════════════════════════════════════════════════════╗
  151. ECHO    ║  This is an unregistered copy of MULTIMEDIA 1, for EVALUATION ONLY.      ║
  152. ECHO    ║  IF YOU CONTINUE TO USE THIS PACKAGE, PLEASE ....  ~~~~~~~~~~~~~~~       ║
  153. ECHO    ║  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~                             ║
  154. ECHO    ║  Send CHECK or M.O. for $59 to:         ╔════════════════════════╗       ║
  155. ECHO    ║           C.M.S. INC    ~~~             ║     Call toll free     ║       ║
  156. ECHO    ║       3005 Glenmore Ave.                ║     1-800-847-0309     ║       ║
  157. ECHO    ║       Balto. MD 21214  USA              ║ for CREDIT CARD orders.║       ║
  158. ECHO    ║          410-665-0193                   ╚════════════════════════╝       ║
  159. ECHO    ║                                                                          ║
  160. ECHO    ║  Within 2 weeks, you will receive the registered version of this new     ║
  161. ECHO    ║  innovative package with OVER 1 MEG. OF SPEECH AND MUSIC, THE IMAGE      ║
  162. ECHO    ║  PROCESSOR, THE DEVELOPMENT EDITOR, SVGA DISPLAY CAPABILITY, ADVANCED    ║
  163. ECHO    ║  COMMANDS, TECHNICAL SUPPORT, COMPLETE MANUAL and a FREE 2nd program.    ║
  164. ECHO    ║                                                                          ║
  165. ECHO    ║  Your support will allow us to continue to develop MULTIMEDIA software   ║
  166. ECHO    ║  for your applications.  We have worked 203 weeks in the development     ║
  167. ECHO    ║  of MULTIMEDIA 1,  please support our products by sending in your        ║
  168. ECHO    ║  registration fee.  You will receive a top quality package.              ║
  169. ECHO    ║                     ──────────────────────────────────────               ║
  170. ECHO    ║ ** $59.00 IS A SMALL PRICE TO PAY FOR A PACKAGE WITH THIS CAPABILITY. ** ║
  171. ECHO    ╚══════════════════════════════════════════════════════════════════════════╝
  172. DELAY
  173. SAY REGISTER
  174. ECHO      Press Shift Print Scrn to print this page  or  Press any key to continue.
  175. KEY
  176. echo.
  177. echo.
  178. echo  This package is part of our complete line of speech products for EDUCATIONAL,
  179. echo  BUSINESS, COMEDY, ENTERTAINMENT and PROGRAMMING applications. We can record
  180. echo  custom speech and capture video images from photos, VCR tapes and artwork.
  181. echo  Refer to MANUAL.EXE (Other Products and Services) for more information.   
  182. echo.
  183. ECHO  WINDOWS USERS - Start Windows like this  "WIN /S"  before you run Multimedia 1.
  184. ECHO.
  185. echo.
  186. echo                      ***  THANK YOU FOR YOUR SUPPORT  ***
  187. echo.
  188. echo   Type  BLASTER  if you have a SOUND BLASTER.
  189. echo.
  190. echo   Type  MENU  to restart MULTIMEDIA 1.
  191. delay 2
  192. echo. 
  193.